unit uWinChgPwd;

interface

uses
  Windows,
  Messages,
  SysUtils,
  Variants,
  Classes,
  Graphics,
  Controls,
  Forms,
  uniGUITypes,
  uniGUIAbstractClasses,
  uniGUIClasses,
  uniGUIForm,
  uniGUIBaseClasses,
  uniEdit, uniButton;

type
  TWinChgPwd = class(TUniForm)
    edtOldPwd: TUniEdit;
    edtPwd1: TUniEdit;
    edtPwd2: TUniEdit;
    btn1: TUniButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

function WinChgPwd: TWinChgPwd;

implementation

{$R *.dfm}

uses
  MainModule,
  uniGUIApplication;

function WinChgPwd: TWinChgPwd;
begin
  Result := TWinChgPwd(UniMainModule.GetFormInstance(TWinChgPwd));
end;

end.

